home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: MegaDisc / MegaDisc 18 (1990)(MegaDisc Digital Publishing)(AU)[WB].zip / MegaDisc 18 (1990)(MegaDisc Digital Publishing)(AU)[WB].adf / Programs / MemTest < prev    next >
Text File  |  1990-08-09  |  255b  |  16 lines
  1. .k " "
  2. .bra {
  3. .ket }
  4. avail >ENV:q{$$} FAST
  5. if $q{$$} EQ "0"
  6.    skip nofast
  7. else
  8.    Echo " This machine has *e[32mFAST*e[0m memory ."
  9. endif
  10. delete ENV:q{$$}
  11. quit
  12. lab nofast
  13.    Echo " This machine has *e[32mNO *e[33mFAST*e[0m memory."
  14. delete ENV:q{$$}
  15. quit
  16.